Public Function New( _
   ByVal grayColors() As ColorizeGrayCommandData _
)

Dim grayColors() As ColorizeGrayCommandData
 
Dim instance As New ColorizeGrayCommand(grayColors)

public ColorizeGrayCommand( 
   ColorizeGrayCommandData[] grayColors
)

public:
ColorizeGrayCommand( 
   array<ColorizeGrayCommandData^>^ grayColors
)

Public Sub ColorizeGrayConstructorExample()
   Dim codecs As New RasterCodecs()
   codecs.ThrowExceptionsOnInvalidImages = True

   Dim leadImage As RasterImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "ImageProcessingDemo\Beauty16.jpg"))

   ' Prepare the command
   Dim colors() As RasterColor
   ReDim colors(5)
   colors(0) = New RasterColor(255, 0, 0)
   colors(1) = New RasterColor(0, 255, 0)
   colors(2) = New RasterColor(0, 0, 255)
   colors(3) = New RasterColor(0, 255, 255)
   colors(4) = New RasterColor(255, 0, 255)
   colors(5) = New RasterColor(255, 255, 0)

   Dim i As Integer
   Dim grayColors() As ColorizeGrayCommandData
   ReDim grayColors(5)

   For i = 0 To 5
      grayColors(i) = New ColorizeGrayCommandData(colors(i), i * 10000 + 9999)
   Next
   Dim command As ColorizeGrayCommand = New ColorizeGrayCommand(grayColors)

   ' Call the command
   command.Run(leadImage)

   ' Save the resulted Image
   codecs.Save(command.DestinationImage, Path.Combine(LEAD_VARS.ImagesDir, "ColorizeGrayResult.Bmp"), RasterImageFormat.Bmp, 24)

End Sub

Public NotInheritable Class LEAD_VARS
   Public Const ImagesDir As String = "C:\Users\Public\Documents\LEADTOOLS Images"
End Class

public void ColorizeGrayConstructorExample()
   {
      // Load an image
      RasterCodecs codecs = new RasterCodecs();
      codecs.ThrowExceptionsOnInvalidImages = true;

      RasterImage image = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, @"ImageProcessingDemo\Beauty16.jpg"));

      // Prepare the command
      ColorizeGrayCommandData[] grayColors = new ColorizeGrayCommandData[6];

      RasterColor[] colors = new RasterColor[6];
      colors[0] = new RasterColor(255, 0, 0);
      colors[1] = new RasterColor(0, 255, 0);
      colors[2] = new RasterColor(0, 0, 255);
      colors[3] = new RasterColor(0, 255, 255);
      colors[4] = new RasterColor(255, 0, 255);
      colors[5] = new RasterColor(255, 255, 0);

      for (int i = 0; i < 6; i++)
         grayColors[i] = new ColorizeGrayCommandData(colors[i], i * 10000 + 9999);

      ColorizeGrayCommand command = new ColorizeGrayCommand(grayColors);

      //Call the command
      command.Run(image);

      // Save the resulted image
      codecs.Save(command.DestinationImage, Path.Combine(LEAD_VARS.ImagesDir, "ColorizeGrayResult.Bmp"), RasterImageFormat.Bmp, 24);

   }

static class LEAD_VARS
{
   public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images";
}

public void ColorizeGrayConstructorExample(RasterImage image, Stream outStream)
{
   // Prepare the command
   ColorizeGrayCommandData[] grayColors = new ColorizeGrayCommandData[6];
   RasterColor[] colors = new RasterColor[6];
   colors[0] = new RasterColor(255, 0, 0);
   colors[1] = new RasterColor(0, 255, 0);
   colors[2] = new RasterColor(0, 0, 255);
   colors[3] = new RasterColor(0, 255, 255);
   colors[4] = new RasterColor(255, 0, 255);
   colors[5] = new RasterColor(255, 255, 0);

   for (int i = 0; i < 6; i++)
      grayColors[i] = new ColorizeGrayCommandData(colors[i], i * 10000 + 9999);

   ColorizeGrayCommand command = new ColorizeGrayCommand(grayColors);

   //Call the command
   command.Run(image);

   // Save result image
   RasterCodecs codecs = new RasterCodecs();
   codecs.Save(image, outStream, RasterImageFormat.Jpeg, 24);
   image.Dispose();
}

Public Sub ColorizeGrayConstructorExample(ByVal image As RasterImage, ByVal outStream As Stream)
   ' Prepare the command
   Dim grayColors As ColorizeGrayCommandData() = New ColorizeGrayCommandData(5){}
   Dim colors As RasterColor() = New RasterColor(5){}
   colors(0) = New RasterColor(255, 0, 0)
   colors(1) = New RasterColor(0, 255, 0)
   colors(2) = New RasterColor(0, 0, 255)
   colors(3) = New RasterColor(0, 255, 255)
   colors(4) = New RasterColor(255, 0, 255)
   colors(5) = New RasterColor(255, 255, 0)

   For i As Integer = 0 To 5
      grayColors(i) = New ColorizeGrayCommandData(colors(i), i * 10000 + 9999)
   Next i

   Dim command As ColorizeGrayCommand = New ColorizeGrayCommand(grayColors)

   'Call the command
   command.Run(image)

   ' Save result image
   Dim codecs As RasterCodecs = New RasterCodecs()
   codecs.Save(image, outStream, RasterImageFormat.Jpeg, 24)
   image.Dispose()
End Sub